Imports Microsoft.VisualBasic

Public Class Programar
    Private _id As Integer
    Private _fk_plan_m3 As Integer
    Private _f_inicio As String
    Private _f_fin As String
    Private _f_planificado As String
    Private _cantidad_asignados As Integer
    Private _cantidad_terminados As Integer
    Private _fk_empleado As String

    Public Sub New(ByVal fk_plan_m3 As Integer, ByVal f_inicio As String, ByVal f_fin As String, ByVal f_planificado As String, ByVal cantidad_asignados As Integer, ByVal cantidad_terminados As Integer, ByVal fk_empleado As String, Optional ByVal id As Integer = -1)

        Me._fk_plan_m3 = fk_plan_m3
        Me._f_inicio = f_inicio
        Me._f_fin = f_fin
        Me._f_planificado = f_planificado
        Me._cantidad_asignados = cantidad_asignados
        Me._cantidad_terminados = cantidad_terminados
        Me._fk_empleado = fk_empleado
        Me._id = id

    End Sub

    Public Property Id() As Integer
        Get
            Return _id
        End Get
        Set(ByVal value As Integer)
            _id = value
        End Set
    End Property

    Public Property Fk_plan_m3() As Integer
        Get
            Return _fk_plan_m3
        End Get
        Set(ByVal value As Integer)
            _fk_plan_m3 = value
        End Set
    End Property

    Public Property Fecha_inicio() As String
        Get
            Return _f_inicio
        End Get
        Set(ByVal value As String)
            _f_inicio = value
        End Set
    End Property

    Public Property Fecha_fin() As String
        Get
            Return _f_fin
        End Get
        Set(ByVal value As String)
            _f_fin = value
        End Set
    End Property

    Public Property Rutmpleado() As String
        Get
            Return _fk_empleado
        End Get
        Set(ByVal value As String)
            _fk_empleado = value
        End Set
    End Property

    Public Property Fecha_planificado() As String
        Get
            Return _f_planificado
        End Get
        Set(ByVal value As String)
            _f_planificado = value
        End Set
    End Property

    Public Property Cantidad_asignados() As Integer
        Get
            Return _cantidad_asignados
        End Get
        Set(ByVal value As Integer)
            _cantidad_asignados = value
        End Set
    End Property

    Public Property Cantidad_terminados() As Integer
        Get
            Return _cantidad_terminados
        End Get
        Set(ByVal value As Integer)
            _cantidad_terminados = value
        End Set
    End Property


End Class
